home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 2000 July & August / EPA005.iso / Freeware / Genesis II terrain builder / _SETUP.1 / midBush.ls < prev    next >
Text File  |  1999-07-17  |  285b  |  13 lines
  1. # --- L-System Parser/Mutator --- Lj Lapre ----------------------------------
  2. 4     # recursion depth
  3. 22.5    # angle
  4. 20      # thickness as % of length
  5. #
  6. c(12)A
  7. #
  8. A=~(20)[&FL!A]>>>>>~(20)[&FL!A]>>>>>>>~(20)[&FL!A]
  9. F=S>>>>>F
  10. S=FL[~(90)L]
  11. L=[c(8)^^{-fz+fz+fz-|-fz+fz+fz}]
  12. @
  13.